//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------
USEFORM("Main.cpp", MainForm);
USEFORM("TStatisticsForm.cpp", StatisticsForm);
USEFORM("TCtrRetarderControlTimeForm.cpp", CtrRetarderControlTimeForm);
USEFORM("TAVIFileParameterForm.cpp", AVIFileParameterForm);
USEFORM("TCheckMapForm.cpp", CheckMapForm);
USEFORM("CheckImportDataType.cpp", CheckImportDataTypeForm);
USEFORM("TArresterMapForm.cpp", ArresterMapForm);
USEFORM("TImportParameterForm.cpp", ImportParameterForm);
USEFORM("ShowArresterMap.cpp", ShowArresterMapForm);
USEFORM("TProfileCombinateForm.cpp", ProfileCombinateForm);
USEFORM("about.cpp", AboutBox);
USEFORM("TProfileEditForm.cpp", ProfileEditForm);
USEFORM("TArrestersForm.cpp", ArrestersEditForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	Application->Initialize();
	Application->CreateForm(__classid(TMainForm), &MainForm);
		Application->CreateForm(__classid(TStatisticsForm), &StatisticsForm);
		Application->CreateForm(__classid(TAVIFileParameterForm), &AVIFileParameterForm);
		Application->CreateForm(__classid(TShowArresterMapForm), &ShowArresterMapForm);
		Application->CreateForm(__classid(TCheckMapForm), &CheckMapForm);
		Application->CreateForm(__classid(TArresterMapForm), &ArresterMapForm);
		Application->CreateForm(__classid(TCheckImportDataTypeForm), &CheckImportDataTypeForm);
		Application->CreateForm(__classid(TImportParameterForm), &ImportParameterForm);
		Application->CreateForm(__classid(TProfileCombinateForm), &ProfileCombinateForm);
		Application->CreateForm(__classid(TAboutBox), &AboutBox);
		Application->CreateForm(__classid(TArrestersEditForm), &ArrestersEditForm);
		Application->CreateForm(__classid(TProfileEditForm), &ProfileEditForm);
		Application->CreateForm(__classid(TCtrRetarderControlTimeForm), &CtrRetarderControlTimeForm);
		Application->Run();

	return 0;
}
//---------------------------------------------------------------------
